From: Chong Yidong Date: Sat, 21 Apr 2007 20:06:49 +0000 (+0000) Subject: (perl-indent-command): Use delete-region instead of kill-region. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~699 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=163b5ca0373b3ff924db489b0193a201de5f7991;p=emacs.git (perl-indent-command): Use delete-region instead of kill-region. --- diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el index 255f63aed41..75920a43aa7 100644 --- a/lisp/progmodes/perl-mode.el +++ b/lisp/progmodes/perl-mode.el @@ -647,10 +647,10 @@ possible action from the following list: (if (and comment-start-skip (re-search-forward comment-start-skip eol 'move)) (if (eolp) - (progn ; kill existing comment + (progn ; delete existing comment (goto-char (match-beginning 0)) (skip-chars-backward " \t") - (kill-region (point) eol)) + (delete-region (point) eol)) (if (or (< oldpnt (point)) (= oldpnt eol)) (indent-for-comment) ; indent existing comment (end-of-line)))